home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Arsenal Files 6
/
The Arsenal Files 6 (Arsenal Computer).ISO
/
business
/
splt231w.zip
/
TDXY.ZIP
/
T2-17.BAS
< prev
next >
Wrap
BASIC Source File
|
1990-02-19
|
202b
|
10 lines
10 OPEN "t2-17.plt" FOR OUTPUT AS #1
20 PRINT #1,"M0,1200"
30 FOR I=-5 TO 5
40 PRINT #1,"L";I
60 PRINT #1,"PP=";I
70 PRINT #1,"I1000,0"
80 PRINT #1,"R-1120,100"
90 NEXT I
110 PRINT #1,"H"